:- set(i,2).
:- set(nodes,5000).
:- set(minacc,0.80).
:- set(minpos,2).
:- set(noise,5).
:- set(depth,50).
:- set(verbose,1).
:- set(caching,true).


:- set(test_pos, 'test1.f').
:- set(test_neg, 'test1.n').

:- set(discretization, true).

:- discretization( no_payment_due(link), enrolled(link, no, attribute)).

:-modeh(*,no_payment_due(+student)).
:-modeb(*,male(+student)).
:-modeb(*,longest_absense_from_school(+student,#integer)).
        :-modeb(*,longest_absense_from_school(+student,-integer)).

:-modeb(*,enrolled(+student,#school,#integer)).
        :-modeb(*,enrolled(+student,-school,#integer)).
        :-modeb(*,enrolled(+student,#school,-integer)).
        :-modeb(*,enrolled(+student,-school,-integer)).

:-modeb(*,enlist(+student,#armed_forces)).
        :-modeb(*,enlist(+student,-armed_forces)).

:-modeb(*,unemployed(+student)).
:-modeb(*,filed_for_bankrupcy(+student)).
:-modeb(*,disabled(+student)).



:-determination(no_payment_due/1,male/1).
:-determination(no_payment_due/1,longest_absense_from_school/2).
:-determination(no_payment_due/1,enrolled/3).
:-determination(no_payment_due/1,enlist/2).
:-determination(no_payment_due/1,unemployed/1).
:-determination(no_payment_due/1,filed_for_bankrupcy/1).
:-determination(no_payment_due/1,disabled/1).









% Types
:- consult(misc).

% Background
:- consult(male).
:- consult(longest_absense_from_school).
:- consult(enrolled).
:- consult(enlist).
:- consult(unemployed).
:- consult(filed_for_bankrupcy).
:- consult(disabled).














